home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 May / Macworld (1998-05).dmg / Games World / Shareware Games / Arcade / Supreme Commander / Supreme Commander.mac / 00157.ls < prev    next >
Encoding:
Text File  |  1996-01-30  |  886 b   |  33 lines
  1. on mouseDown
  2.   global occupied, topupied, shaker
  3.   set shaker to 1
  4.   if the visible of sprite 11 = 0 then
  5.     puppetSprite(10, 1)
  6.     set the visible of sprite 8 to 0
  7.     set the locV of sprite 10 to 233
  8.     set the locH of sprite 10 to 559
  9.     set the visible of sprite 10 to 1
  10.     set the visible of sprite 5 to 0
  11.     set the castNum of sprite 11 to 19
  12.     set occupied to 1
  13.     set the visible of sprite 11 to 1
  14.     puppetSprite(11, 1)
  15.     SHWUNK()
  16.   else
  17.     puppetSprite(14, 1)
  18.     set the visible of sprite 12 to 0
  19.     set the locV of sprite 14 to 235
  20.     set the locH of sprite 14 to 558
  21.     set the visible of sprite 14 to 1
  22.     set the visible of sprite 5 to 0
  23.     set the castNum of sprite 17 to 19
  24.     set the visible of sprite 17 to 1
  25.     puppetSprite(17, 1)
  26.     set topupied to 1
  27.     SHWUNK()
  28.   end if
  29.   checkpoker()
  30.   set the visible of sprite 31 to 1
  31.   updateStage()
  32. end
  33.